From: Erik Naggum <erik@naggum.no>
Date: Wed, 5 Feb 1997 01:33:07 +0000 (+0000)
Subject: (edmacro-parse-keys): Remove redundant test for ?.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~82095
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=094e8ee4ac55b3da65f56d300b0421c75dd2452a;p=emacs.git

(edmacro-parse-keys): Remove redundant test for ?.
---

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index b61cc559fd2..150160c802d 100644
--- a/lisp/edmacro.el
+++ b/lisp/edmacro.el
@@ -698,8 +698,7 @@ If START or END is negative, it counts from the end."
 			     ;; and C-? is not used (we use DEL instead).
 			     (string-match "[@-_a-z]" word))
 			(setq key (list (+ bits (- ?\C-\^@)
-					   (if (equal word "?") 127
-					     (logand (aref word 0) 31))))))
+					   (logand (aref word 0) 31)))))
 		       (t
 			(setq key (list (+ bits (aref word 0)))))))))
 	(when key